home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / umich / falcon / programm.ing / nt_dsp1.lzh / NT_DSP1.MSA / FNTNS / SQRT2.ASM < prev    next >
Assembly Source File  |  1989-01-24  |  925b  |  27 lines
  1. ;
  2. ; This program originally available on the Motorola DSP bulletin board.
  3. ; It is provided under a DISCLAMER OF WARRANTY available from
  4. ; Motorola DSP Operation, 6501 Wm. Cannon Drive W., Austin, Tx., 78735.
  5. ; 
  6. ; Square Root by Polynomial Approximation, 10-bit Accuracy.
  7. ; 
  8. ; Last Update 26 Jan 87   Version 1.0
  9. ;
  10. sqrt2   macro
  11. sqrt2   ident   1,0
  12. ;
  13. ;       Does a square root by polynomial aproximation, 10 bit accuracy.
  14. ;       sqrt(x)=-.1985987*x*x+.8803385*x+.3175231
  15. ;       valid for:  .5<= x < 1.0
  16. ;
  17. ;       input value in x0, output in register A.
  18. ;
  19. ;       r1 initially points to the coefficients in y memory in this
  20. ;       order: a1,a2,a0
  21. ;
  22.         mpyr    x0,x0,a  y:(r1)+,y0     ;x**2, get a1
  23.         mpy     x0,y0,a  a,x1 y:(r1)+,y0        ;a1*x, mv x**2, get a2
  24.         macr    x1,y0,a  y:(r1)+,y0     ;a2* x**2, get a0
  25.         add     y0,a                    ;add in a0
  26.         endm
  27.